Inference at * 1 2 1 2 1 1 
Iof proof for Lemma adjacent-append:



1. T : Type
2. x : T
3. y : T
4. L1 : T List
5. L2 : T List
6. i : {0..((||L1||+||L2||) - 1)}
7. x = (L1 @ L2)[i]
8. y = L2[((i+1) - ||L1||)]
9. (i < ||L1||)
  ((i - ||L1||)+1) ~ ((i+1) - ||L1||) 

latex

 by Auto' 

latex

 .

Definitions	s ~ t, i  j , {x:A| B(x)} , x:A. B(x), x:AB(x), , #$n, ||as||, l[i], as @ bs, A, {i..j}, type List, Type, s = t, n - m, t  T, n+m
Lemmas	length wf1